﻿Imports System.Text
Imports D2L.Extensibility.AuthSdk
Imports RestSharp
Imports D2L.Extensibility.AuthSdk.Restsharp

<TestClass()>
Public Class VersionTeste

    Private _authObj As Authenticate.Authenticate = New Authenticate.Authenticate()
    Protected method As Authenticate.Service

    '----------------------------------------------------------------
    'Protected Const ROUTE_VERSIONS As String = "/d2l/api/lp/versions/"

    <TestMethod()>
    Public Sub version()

        method = New Authenticate.Service

        Dim _response As RestSharp.IRestResponse(Of Version.Version) = _authObj.ExecuteService_with_UserContext(method.GetVersion, RestSharp.Method.GET, Type.Version)

        Console.WriteLine("{0}{1}", "Response:", _response.ToString())
        Console.WriteLine("Response Content: {0}", _response.Content.ToString())

        Assert.IsNotNull(_response)
        Assert.AreEqual("OK", _response.StatusCode.ToString())

    End Sub

End Class
